home *** CD-ROM | disk | FTP | other *** search
/ Shareware Grab Bag / Shareware Grab Bag.iso / 011 / park.asm < prev    next >
Encoding:
Assembly Source File  |  1985-06-03  |  1.9 KB  |  45 lines
  1.         PAGE    60,132
  2.         TITLE   PARK (PROGRAM TO PARK THE FIXED DISK HEADS)
  3. ;------------------------------------------------------------------;
  4. ;                                                                  ;
  5. ;       This program moves the hard disk head to cylinder 320      ;
  6. ;       before you power down the drive.                           ;
  7. ;                                                                  ;
  8. ;       It was originally written by Roy M. Matney and             ;
  9. ;       appeared in the October, 1984 issue of BYTE.               ;
  10. ;                                                                  ;
  11. ;       Terry Barr  10-22-84                                       ;
  12. ;------------------------------------------------------------------;
  13. STACK   SEGMENT PARA PUBLIC 'STACK'
  14.         DB      64 DUP ('STACK   ')
  15. STACK   ENDS
  16.  
  17. WORK    SEGMENT PARA PUBLIC 'WORK'
  18.         DB      '$'
  19. WORK    ENDS
  20.  
  21. SOFT    SEGMENT PARA PUBLIC 'SOFT'
  22. LOC     DB      ?
  23. SOFT    ENDS
  24.  
  25. CSEG    SEGMENT PARA PUBLIC 'CODE'
  26. START   PROC    FAR
  27.         ASSUME CS:CSEG,DS:WORK,SS:STACK,ES:SOFT
  28.  
  29.         PUSH    DS
  30.         SUB     AX,AX
  31.         PUSH    AX
  32.         MOV     AX,WORK
  33.         MOV     DS,AX
  34.         MOV     ES,AX                   ; DMA LOCATION
  35.  
  36.         MOV     AX,0C01H                ; SEEK COMMAND - 1 SECTOR
  37.         MOV     BX,0000H                ; DMA OFFSET
  38.         MOV     CX,3F41H                ; CYL=320 - SECTOR=1
  39.         MOV     DX,0080H                ; HEAD=0 - DRIVE=0
  40.         INT     13H                     ; CALL FIXED DISK BIOS
  41.         RET                             ; RETURN TO DOS
  42. START   ENDP
  43. CSEG    ENDS
  44.         END     START
  45.